home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / dev / lang / PPCsmalltalk.lha / PPCSmallTalk / examples / fork.st < prev    next >
Text File  |  1986-10-19  |  132b  |  14 lines
  1. Class Main
  2. [
  3.     loop1
  4.         10 timesRepeat: [17 print]
  5. |
  6.     loop2
  7.         10 timesRepeat: [23 print]
  8. |
  9.     main
  10.         [self loop1] fork.
  11.         self loop2
  12. ]
  13.  
  14.